(ftfont_list): Downcase family name to check generic families.

diff --git a/src/ftfont.c b/src/ftfont.c
index 9895f8307e80e2af188cf9050f76c5e7c5552d98..e11de08259bd454333cf73a10a7f9859cd0fd894 100644 (file)
--- a/src/ftfont.c
+++ b/src/ftfont.c
@@ -597,6 +597,7 @@ ftfont_list (frame, spec)
     family_list = Fcons (Qnil, Qnil);
   else
     {
+      family = Fintern (Fdowncase (SYMBOL_NAME (family)), Qnil);
       family_list = ftfont_list_generic_family (family);
       if (NILP (family_list))
        family_list = Fcons (family, Qnil);